home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Georgia Wildfire Prevention
/
Georgia Wildfire Prevention.iso
/
pc
/
media
/
dirs
/
BackUp
/
code.cst
/
00006_Script_hilite_move_animation
< prev
next >
Wrap
Text File
|
2002-10-15
|
544b
|
29 lines
property orect,spritenum,mysprite,myid,stay_on
on new me
mysprite=sprite(spritenum)
orect=mysprite.rect
end
on getpropertydescriptionlist me
plist=[#myid:[#comment:"Sequence number",#format:#integer,#default:1,#range:[#min:1,#max:10]],\
#stay_on:[#comment:"Keep on?",#format:#boolean,#default:FALSE]]
return plist
end
on beginsprite me
mysprite.loch=(-2000)
end
on animate me,dx
if dx=myid then
mysprite.rect=orect
else
if stay_on=0 then mysprite.loch=(-2000)
end if
updatestage
end